/ Erect Magazine 4 / Erect Magazine 4.iso / mac / PhotoBr6 / PhotoBr6.rsrc / VWFI_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 00 f2 5a b8 | 00 00 00 08 00 00 00 00 |......Z.|........|
|00000010| 00 07 00 00 00 00 00 00 | 02 f2 00 00 03 16 00 00 |........|........|
|00000020| 03 3a 00 00 03 3a 00 00 | 03 3c 00 00 03 3c 00 00 |.:...:..|.<...<..|
|00000030| 03 3c 6f 6e 20 53 74 61 | 72 74 4d 6f 76 69 65 0d |.<on Sta|rtMovie.|
|00000040| 20 20 20 20 47 6c 6f 62 | 61 6c 20 43 6f 6e 66 69 |    Glob|al Confi|
|00000050| 67 5f 47 0d 20 20 20 20 | 2d 2d 70 75 74 20 22 30 |g_G.    |--put "0|
|00000060| 2c 31 2c 35 22 20 69 6e | 74 6f 20 43 6f 6e 66 69 |,1,5" in|to Confi|
|00000070| 67 5f 47 0d 65 6e 64 0d | 2d 2d 0d 6f 6e 20 52 65 |g_G.end.|--.on Re|
|00000080| 61 64 50 69 63 74 0d 20 | 20 20 20 47 6c 6f 62 61 |adPict. |   Globa|
|00000090| 6c 20 50 68 6f 74 6f 4e | 6f 5f 47 0d 20 20 20 20 |l PhotoN|o_G.    |
|000000a0| 70 75 74 20 70 61 74 68 | 4e 61 6d 65 28 29 20 26 |put path|Name() &|
|000000b0| 20 22 50 48 4f 54 4f 3a | 50 49 43 54 3a 45 58 3a | "PHOTO:|PICT:EX:|
|000000c0| 50 48 4f 54 4f 5f 22 20 | 26 20 50 68 6f 74 6f 4e |PHOTO_" |& PhotoN|
|000000d0| 6f 5f 47 20 26 20 22 2e | 50 49 43 22 20 69 6e 74 |o_G & ".|PIC" int|
|000000e0| 6f 20 66 4e 61 6d 65 0d | 20 20 20 20 70 75 74 20 |o fName.|    put |
|000000f0| 46 69 6c 65 49 4f 28 6d | 4e 65 77 2c 20 22 72 65 |FileIO(m|New, "re|
|00000100| 61 64 22 2c 66 4e 61 6d | 65 29 20 69 6e 74 6f 20 |ad",fNam|e) into |
|00000110| 6d 79 50 0d 20 20 20 20 | 69 66 20 6f 62 6a 65 63 |myP.    |if objec|
|00000120| 74 50 28 6d 79 50 29 20 | 74 68 65 6e 0d 20 20 20 |tP(myP) |then.   |
|00000130| 20 20 20 20 20 73 65 74 | 20 74 68 65 20 70 69 63 |     set| the pic|
|00000140| 74 75 72 65 20 6f 66 20 | 63 61 73 74 20 22 50 69 |ture of |cast "Pi|
|00000150| 63 74 43 61 73 74 22 20 | 3d 20 6d 79 50 28 6d 52 |ctCast" |= myP(mR|
|00000160| 65 61 64 50 49 43 54 29 | 0d 20 20 20 20 20 20 20 |eadPICT)|.       |
|00000170| 20 6d 79 50 28 6d 44 69 | 73 70 6f 73 65 29 0d 20 | myP(mDi|spose). |
|00000180| 20 20 20 65 6c 73 65 0d | 20 20 20 20 20 20 20 20 |   else.|        |
|00000190| 62 65 65 70 20 31 0d 20 | 20 20 20 65 6e 64 20 69 |beep 1. |   end i|
|000001a0| 66 20 0d 65 6e 64 0d 2d | 2d 0d 6f 6e 20 52 65 61 |f .end.-|-.on Rea|
|000001b0| 64 43 61 73 74 0d 20 20 | 20 20 73 65 74 20 74 68 |dCast.  |  set th|
|000001c0| 65 20 63 61 73 74 4e 75 | 6d 20 6f 66 20 73 70 72 |e castNu|m of spr|
|000001d0| 69 74 65 20 31 20 3d 20 | 74 68 65 20 6e 75 6d 62 |ite 1 = |the numb|
|000001e0| 65 72 20 6f 66 20 63 61 | 73 74 20 22 42 6c 61 63 |er of ca|st "Blac|
|000001f0| 6b 42 6f 61 64 22 0d 20 | 20 20 20 75 70 64 61 74 |kBoad". |   updat|
|00000200| 65 73 74 61 67 65 0d 20 | 20 20 20 2d 2d 0d 20 20 |estage. |   --.  |
|00000210| 20 20 47 6c 6f 62 61 6c | 20 50 68 6f 74 6f 4e 6f |  Global| PhotoNo|
|00000220| 5f 47 2c 50 68 6f 74 6f | 5f 47 0d 20 20 20 20 70 |_G,Photo|_G.    p|
|00000230| 75 74 20 22 50 68 6f 74 | 6f 50 61 6c 22 26 50 68 |ut "Phot|oPal"&Ph|
|00000240| 6f 74 6f 4e 6f 5f 47 20 | 69 6e 74 6f 20 50 61 6c |otoNo_G |into Pal|
|00000250| 5f 57 0d 20 20 20 20 70 | 75 70 70 65 74 50 61 6c |_W.    p|uppetPal|
|00000260| 65 74 74 65 20 50 61 6c | 5f 57 2c 36 30 0d 20 20 |ette Pal|_W,60.  |
|00000270| 20 20 75 70 64 61 74 65 | 73 74 61 67 65 0d 20 20 |  update|stage.  |
|00000280| 20 20 2d 2d 0d 20 20 20 | 20 70 75 74 20 50 68 6f |  --.   | put Pho|
|00000290| 74 6f 4e 6f 5f 47 2b 31 | 32 38 20 69 6e 74 6f 20 |toNo_G+1|28 into |
|000002a0| 50 68 6f 74 6f 5f 57 0d | 20 20 20 20 70 75 74 20 |Photo_W.|    put |
|000002b0| 74 68 65 20 6e 61 6d 65 | 20 6f 66 20 63 61 73 74 |the name| of cast|
|000002c0| 20 50 68 6f 74 6f 5f 57 | 20 69 6e 74 6f 20 6e 61 | Photo_W| into na|
|000002d0| 6d 65 5f 57 0d 20 20 20 | 20 73 65 74 20 74 68 65 |me_W.   | set the|
|000002e0| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|000002f0| 74 65 20 31 20 3d 20 74 | 68 65 20 6e 75 6d 62 65 |te 1 = t|he numbe|
|00000300| 72 20 6f 66 20 63 61 73 | 74 20 6e 61 6d 65 5f 57 |r of cas|t name_W|
|00000310| 0d 20 20 20 20 75 70 64 | 61 74 65 73 74 61 67 65 |.    upd|atestage|
|00000320| 0d 65 6e 64 23 51 75 61 | 64 72 61 39 35 30 20 2d |.end#Qua|dra950 -|
|00000330| 20 54 6f 74 61 6c 20 4d | 65 64 69 61 20 41 67 65 | Total M|edia Age|
|00000340| 6e 63 79 2c 49 6e 63 2e | 23 51 75 61 64 72 61 39 |ncy,Inc.|#Quadra9|
|00000350| 35 30 20 2d 20 54 6f 74 | 61 6c 20 4d 65 64 69 61 |50 - Tot|al Media|
|00000360| 20 41 67 65 6e 63 79 2c | 49 6e 63 2e 00 00       | Agency,|Inc...  |
+--------+-------------------------+-------------------------+--------+--------+